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1.0 


2.0 
2.1 
2.2 


2.3 


3.0 


4.0 


5.0 


5.1 


5.2 
5.2.17 


5.2.2 


6.0 


6.1 


6.2 


ABSTRACT 


THIS IS A TEST OF ALL THE 11/45 HARDWARE REGISTERS 
(R10-15, SUPERVISOR STACK POINTER(R16). USER STACK 
POINTER(R17), AND THE MICRO BREAK REGISTER. THIS 
TEST INSURES THAT ALL BITS IN EACH OF THE REGISTERS 
CAN BE SET AND CLEARED PROPERLY. 


REQUIREMENTS 

EQUIPMENT 

BASIC 11/45 SYSTEM 

STORAGE 

THIS PROGRAM USES 0 THRU 17500 


PRELIMINARY PROGRAMS 
DOAA THRU DOMA 


LOADING PROCEDURE 
LOAD PROGRAM USING ABS LOADER 


STARTING PROCEDURE 


LOAD ADDRESS 200. PRESS START. THE PROGRAM WILL LOOP 


AND RING BELL ON PASS COMPLETION. 

OPERATING PROCEDURE 

SWITCH SETTINGS 

NONE 

SUBROUTINE ABSTRACTS 

SCOPE 

SCOPE IS A MOVE PC,R1 AND STORES THE PC+2 IN R1. 
HLT 

HLT IS A HALT INSTRUCTION. 


ERRORS 
ALL ERRORS WILL CAUSE A HALT 


TRAP AND INTERRUPT ERRORS WILL CAUSE A HALT AT VECTOR#2. 


ERROR RECOVERY 
PRESS CONTINUE TO PROCEDE TO NEXT TEST 


ERROR LOOPING 


TO LOOP ON AN ERROR, PLACE A BRANCH TO THE —— SCOPE 


INSTRUCTION IN PLACE Gf THE HALT INSTRUCTION 


NOTE THAT IF THE ERROR IS INTERMITTANT THAT THE TEST WILL 


DROP THRU THE HALT AND PROCEED TO THE NEXT TEST 


THEREFORE, TO LOOP THE TEST CONTINUOSLY REPLACE THE BEQ . 
INSTRUCTION IMMEDIATLY PRECEEDING THE HALT WITH A BRANCH 


BACK TO THE PREVIOUS SCOPE. 


td 


TO LOOP ON TRAP FAILURES, PATCH IN THE FOLLOWING ROUTINE 


AT THE ADDRESS OF THE TRAP VECTOR. 


SEQ 0002 


CCKBHBO 11/45 REGISTERS 
CCKBHB.P11 


D1 
MACY11 30A(1052) O1-MAY-78 13:27 PAGE 3 


21-APR-78 09:34 


7.0 


8.0 


8.1 


8.2 


LISTING 


TRAPVEC: TRAPVEC +4 

TRAPVEC#+2: 0 

TRAPVEC+4: 012716 ;MOVE SCOPE ADDRESS TO STACK 
TRAPVEC+6: ADDRESS ;ADDRESS OF PREVIOUS SCOPE 
TRAPVEC+10: 000006 ;RETURN TO TEST AT SCOPE 


RESTORE ALL LOCATIONS BEFORE PROCEEDING TO NEXT TEST. 
RESTRICTIONS 

NONE 

MISCELLANEOUS 

ON TRAP ERRORS THE STACK POINTER(R6) WILL CONTAIN THE 
ADDRESS WHERE THE TRAP OCCURED. 


EXECUTION TIME 
THIS PROGRAM TAKES ABOUT 1 MINUTE. 


STACK POINTER 
THIS PROGRAM INITIALY SETS THE STACK POINTER AT 500. 


SEQ 0003 


— 
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000001 


000200 


000400 


100000 
000000 


000007 
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-TITLE CCKBHS80 11/45 REGISIERS 
-NLIST MC,MD 

-LIST ME 

- ABS 


3 TEST CCKBHB- THIS DIAGNOSTIC TESTS THAT ALL BITS IN THE NEW 11/45 REGISTERS 
3R10-R15, SUPERVISOR & USER STACK POINTER (SSP & USP), AND MICRO BREAK REGISTER 
CAN BE SET AND CLEARED, AND ARE SELECTED PROPERLY. 
sNOTE: ALL PREREQUISITE INSTRUCTION TESTS SHOULD BE SUCCESSFULLY RUN 
;BEFORE THIS PROGRAM. 
NOTE: RO-R7 REFERS TO CONVENTIONAL (11/20) REGISTERS AND R10-R17 REFERS TO 
sADDITIONAL 11/45 REGISTERS. KSP,SSP,AND USP REFER TO THE KERNEL,SUPERVISOR, 
AND USER STACK POINTERS. 
: STARTING PROCEEDURE 

LOAD ADDRESS=200 

PRESS START 

KERNEL STACK POINTER IS AT 500 

SUPERVISOR STACK POINTER IS AT 600 

USER STACK POINTER IS AT 700 

BELL WILL RING WHEN TEST IS COMPLETE 


REGISTER IDENTIFIERS THESE BITS IDENTIFY EACH REGISTER 
BITO=1 REGISTER 0 IDENT 


BIT?= 200 Pie 


;UPPER SET 
B1T8=400 
B1T9=1000 
B1T10=2000 
B1T11=4000 
BIT12=10000 
B1T13=20000 
B1T14=40000 
B1T15=100000 


1 
2 
3 
4 
5 
6 
7 


REGISTER 


— 4 Ss SS 


;KERNEL'S STACK POINTER 
; SUPERVISOR'S STACK POINTER 
USER'S STACK POINTER 





— 
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000000 R10=2%0 
R11=%1 
R12=%2 
R13=%3 
R14=%4 
R15=%5 
R16=%6 
000007 R17=%7 


000500 KPTR=500 sKERNEL'S INITIAL STACK POINTER 
000600 SPTR=600 ; SUPERVISOR'S INITIAL STACK POINTER 
000700 UPTR=700 USER'S INITIAL STACK POINTER 
REGISTER ADDRESSES 
177570 DISPLAY=177570 ADDRESS OF CONSOLE DISPLAY REGISTER 
177776 PSW=177776 ADDRESS OF PROCESSER STATUS WORD 
177770 UBREAK=177770 ADDRESS OF MICRO BREAK REGISTER 
177564 TPCSR=177564 
177566 TPBUF =177566 
177570 SWR=177570 ADDRESS OF CONSOLE SWITCH REGISTER 
022626 POP2=22626 CMP (6)+,(6)+ POPS 2 WORDS OFF STACK 
010701 SCOPE=010701 sMOV PC,R1 (R11) 
000000 HLT=0 
:VECTOR ADDRESSES 
000004 ERRVEC=4 :ADDRESS OF ERROR TRAP VECTOR 
TBITVEC=14 sADDRESS OF 'T* BIT TRAP VECTOR 
EMTVEC=30 zADDRESS OF EMT TRAP VECTOR 
000034 TRAPVEC=34 ;ADDRESS OF TRAP TRAP VECTOR 


000000 KERNEL MODE 


:BIT ASSIGNMENTS IN PSW 
KM=0 


040000 SM=40000 “SUPERVISORY MODE 
140000 UM=140000 “USER MODE 


; TRAP CATCHER FROM 0 TO 376 
000000 -=0 
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-RARABRARARARARRSAASASAAARASASALALEASESALSAESALASLASER ASE S ESSA S SS SS | 


MODIFIED FEB 28 1978 
ACT11 AND XXDP HOOKS 


000400 . SAVE PROGRAM COUNTER 


000040 -=4 
000040 000 . :DRIVE # FOR XXDP LOAD MEDIUM 
;ASSEMBLE AS A 0 


000041 24 
000041 000 MEDIUM: . :XXDP LOAD MEDIUM 
sASSEMBLE AS A 0 


000042 -=42 
000042 000000 «WORD ;ACT11 INDICATOR 
sASSEMBLE AS A 0 


000046 -=46 
000046 004004 -WORD SENDAD ;SET TO SENDAD IN .$EOP 


000052 -=52 
000052 000000 «WORD Ce ae OF PROGRAM 
SET TO 


000400 -=SSVPC RESTORE PROGRAM COUNTER 


(RR RRRARRASARRARASARASAASARASASASESLARLEALESESESESSER SEES S SERRA SES SE 


000100 
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(REBAR ARARARAAASRAAASEAASLALASALASASLAAELASLLSSASESESE SESS SARS ESSA SSS 


MODIFIED FEB 28 1978 


++ 
ACT11 AND XXDP MODE INDICATORS 


000100 000000 AUTOM: .WORD sAUTOMATIC MODE INDICATOR 
0010 000 3;ACT11 AUTO MODE INDICATOR 
:XXDP AUTO MODE INDICATOR 

ta ;ACT11 DUMP MODE INDICATOR 

000105 XDUMPM: .BYTE :XXDP DUMP MODE INDICATOR 


LARRRAGBRAARARASAASSRARAAAAASALASLALALESESALESSSSS ESAS ESE SSR RSE SS SS 





ee. 
CCKBHBO 11/45 REGISTERS MACY11 30A(1052) 01-MAY-78 13:27 PAGE 8 SEQ 0008 
CCKBHB.P11 21-APR-78 09:34 


000200 . 
000200 004767 003614 PC, CKMODE CHECK FOR MODE OF OPERATION ++ C.W 
000204 000167 000600 START 


001000 ° 
001000 sPASS COUNT 
001002 


001010 177764 ICNT 
177760 177570 ICNT,@#DISPLAY ;DISPLAY PASS COUNT 
000500 #KPTR,KSP s INITIALIZE THE STACK POINTER 
000400 177570 #400 ,a#SuR ;LOAD MICRO BREAK REGISTER? 


-+10 
177570 177770 @#SWR,Q@#UBREAK ;LOAD MICRO BREAK REG WITH SRO-7 
005067 176726 CLR PSW 
LOAD EACH REGISTER WITH ITS IDENTIFIER 


012700 000001 T0: #B1TO,RO 
#B1T1,R1 
#B1T2,R2 
#B1T3,R3 
#B1T4,R4 
#BIT5,R5 

176670 #B1T11,PSw SET REGISTER SET BIT 

#B1T8,R10 
#B1T9,R11 





001132 012705 020000 
001136 005067 176634 SWITCH TO CONVENTIONAL REGISTERS 


TEST THAT ALL REGISTERS WERE PROPERLY LOADED 
001142 022700 000001 CMP bps 
+ 


000002 #BIT1,R1 
+4 


000004 #B1T2,R2 
+4 


000010 #B1T3,R3 
+4 


000020 #BIT4,R4 
+4 


000040 #BITS,R5 
+4 


000500 #KPTR,KSP 
001226 001401 +4 
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001230 000000 HLT 
;SWTICH TO UPPER REGISTERS 
001232 012767 004000 176536 MOV #B1T11,PSW 
022700 000400 #B1T8,R10 
. 


rodne J +4 
, 001000 #B1T9,R11 
+4 


002000 — 


a? 


004000 #B1T11,R13 
+4 

010000 #B1T12,R14 
+4 


020000 wr pape 
ao 
001316 000000 HLT 
3R7 CHECK 
001320 012707 001330 MOV #TOX,R17 
001324 000000 HLT 
001326 000000 HLT 


001330 005067 176442 TOX: CLR PSW 
001334 010701 SCOPE 


;CHECK THAT ALL BITS IN R10 CAN BE SET/CLEARED. 
001336 012767 004000 176432 AO: MOV #B1T11,PSW 

177432 #20, TEMP+2 
177414 AOA: 


177406 


177400 

010701 
BITS IN R11 CAN BE SET/CLEARED. 
012767 004000 176360 Al MOV #B1T11,PSW 
177360 #20, TEMP+2 

177342 AlA: 

177334 

177326 TEMP+2 


A1A 
001460 010701 
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001462 


001730 


012767 


010701 


012767 


010701 


012767 


010701 


012767 


010701 


177270 
177262 


177254 


004000 


177216 
177210 


177202 


004000 
000020 
000001 
177150 
177144 


177136 


177130 


177072 
177064 


177056 
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176306 
177306 


176234 
177234 


176162 
177162 


;CHECK THAT ALL BITS IN R12 CAN BE SET/CLEARED. 
A2: MOV #B1T11,PSW 


A2A: 


A3A: 


;CHECK THAT ALL 
AS: MOV 


ASA: 


#20, TEMP+2 
1,R12 


TEMP+2 
A2A 


BITS IN R13 CAN BE SET/CLEARED. 
#B1T11,PSwW 

#20, TEMP+2 

#1,R13 

R13, TEMP 

TEMP 

R13 

R13, TEMP 

+4 


TEMP+2 
A3A 


BITS IN R14 CAN BE SET/CLEARED. 
#B1T11,PSW 

#20, TEMP+2 

#1,R14 

R14, TEMP 

TEMP 


R14 
R14, TEMP 
+4 


TEMP+2 
ASA 


BITS IN R15 CAN BE SET/CLEARED. 
#B1T11,PSW 
#20, TEMP+2 


#1,R15 
R15, TEMP 
TEMP 


R15 
R15, TEMP 
+4 


TEMP+2 
ASA 


SEQ 0010 
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012767 004000 176036 #B1T11,PSW 
#81T8,R10 
#B1T9,R11 


010701 


012767 004000 175772 : ° :GO UPPER SET 
0 ;MOVE BITS TO PSW (SWITCHES 
176764 TO 11/20 REGS.) 
000001 176756 #8170, TEMP sWAS CORRECT %0 LOADED IN PSW 
+4 :IF BIT 0 WAS SET 11/20 REG 0 
sWAS INCORRECTLY SELECTED 
176746 TEMP z1F TRULY R10 PSW WILL BE 


+4 7 CLEAR 
0000 sERROR! DID INST AT TIA CLR PSW? 
010701 
012767 004000 175726 : #BIT11,PSwW 
175722 R10,PSW sSEL 11/20 REGS. 
175716 RO,PSW MOVE BITO TO PSW (SETS C) 
+4 31S CARRY SET? 


RO NOT SELECTED 
010701 


012767 904000 175702 : #B1T11,PSw 
175676 y Psu CLEAR BIT11 IN PSW 
175672 :MOVE BIT1 TO PSW 
175666 176670 
000004 176662 #8172, TEMP 


+4 
002124 010701 


002126 012767 004000 175642 : #B1T11,PSw 
R13,PSW 
R2,PSw 
176630 PSW, TEMP 
000004 176622 #8112, TEMP 


+4 


004000 175602 : #B1T11,PSe 
R13,PSW 


R3_PSW 
176570 PSW, TEMP 
000010 176562 + ahead 


002224 010701 
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CKBHB.P11 
002226 


002520 


012767 


010701 
012767 


010701 
012767 


010701 
012767 
005000 


000000 
010701 
012767 


010701 


012767 
012701 
010167 


004000 
002276 
175550 
000020 
175516 
004004 


002344 


175442 


000016 


004000 
000040 


004000 
176342 


004000 


000200 
176312 
177600 


000400 


004000 
177777 
176256 
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175502 
175456 


176444 


175436 


175410 
176372 


176364 


175344 


175322 
176316 


175262 
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#B81T11,PSW 

#T6A, TBITVEC 

TBITVEC+2 

=A Fn sATTEMPT TO SET ‘T* BIT 

#BIT11+BIT2, TEMP; a BIT SHOULD NOT HAVE SET 

T6x ;*Z* WAS SET BY CLR TBITVEC+2 INST. 
ERROR! ONLY BIT11 & Z SHOULD BE SET 


sERROR! *T* BIT CAUSED A TRAP 


T6X 


#T7A, TBITVEC 
#BIT11,PSu 
a 


#16,14 


#81T11,PSu 
#B1T11,R15 


#8175, TEMP 
+4 


#B1T11,PSW 
R10 

R10, TEMP 
+4 


#B1T11,PSu 
R10 


#B1T7, TEMP 

TEMP,R10 MOVB TO A REG. EXTENDS SIGN 
a iid :DID SIGN EXTEND 

.+ 


#B1T8,R10 


#B1T11,PSW 
#-1,R11 
R11, TEMP 


SEQ 0012 
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026727 
podned 


00000 
010701 


012767 


0000 
012701 
010701 


012767 
03 


010701 


012767 
012704 
02 


010701 


060302 
010267 
022767 
001401 

000000 
012702 
010701 


176252 


004000 

177777 
17777 
176217 
000037 


001000 
004000 
176164 


176160 


004000 


004000 
000001 


010000 


176106 
006000 


002000 


176064 
177777 
004000 


177777 


001004 
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177777 


175230 
176222 


175166 


006000 


175132 


176100 


176054 
175042 


176032 


CMP 
BEQ 
HLT 
SCOPE 


;TEST THAT MOVB 
714: MOV 


715: 
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TEMP ,#-1 
+4 


TO A REGISTER EXTENDS THE SIGN (SIGN = 0) 
#B1T11,PSu 

#-1,R11 

ie TEMP 

TEMP+1 R11 

#37811 


#B1T9,R11 


; TEST THAT XOR wa ZR OPERATES PROPERLY 
a #B1T11,PSW 


2 


R12.R13 

R13, TEMP 

a Seren 
.+ 


#B1T11,R13 


; TEST SOB WITH UPPER REGISTER SET 
716: MOV #B1T11,PSW 


MOV 
BR 
T16A: HLT 
BR 
T16B: $0B 
T16X: MOV 
SCOPE 


: TEST oy A am ZR 
T17: 


#1,R14 
T16B 


T16Xx 
R14,T16A 
#B1T12,R14 


USING UPPER REGISTER SET 
R13,R12 


R12, TEMP - om 
#B1T10+B1T11, TEMP” 


+4 


#B1T10,R12 


; TEST or ss SET (R13) IN AUTO INCREMENT MODE. 
720: CLR TEMP+2 :PR 


RE SET MEMORY ADDRESS 


#-1, TEMP 

#81711, Psu sSWITCH TO UPPER REG. SET 
#TEMP R13 LOAD REGISTER 
(R13)+,TEMP+2 ;MOVE TEMP TO TEMP+2 

oP cana. ;WAS TEMP MOVED 

+ 


ERROR! 
~ Walteat 7DID R13 INCREMENT 
.+ 


SEQ 0013 
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002764 000000 HLT sERROR! R13 DID NOT AUTO=INCREMENT 
002766 010701 SCOPE 


; TEST UPPER REG. SET (R14) IN AUTO-DECREMENT MODE 
002770 012767 001002 176006 120A: MOV co - TEMP+2 


C 
174766 #B1T11,PSw 
#TEMP+4 R14 
~(R14), TEMP 
001002 175754 so sigh: ait 
+ 


001004 en ;DID REGISTER AUTO-DECREMENT 
.+ 


003042 010701 
TESTS 21 AND 22 HAVE BEEN DELETED. 


; TEST UPPER REGISTER SET REGISTERS AS INDEX REGISTERS 
003044 000240 T23: NOP THIS LOCATION MAY BE USED TO CLEAR 


REGISTER SET BIT. 
003046 012767 001002 175730 #TEMP, TEMP+2 
177777 =—175720 #-1, TEMP 
177776 #-2,R12 + LOAD INDEX 
R12,R15 REGISTERS 
001006 001006 aTEMP+4 (2), aTEMP+4(5) ADD TEMP (TEMP+4(5) TO ITSELF 
+4 z-1,+-1 RESULTS IN CARRY 


177776 =175672 oe ;RESULT CORRECT 
.+ 


003114 010701 


TEST THAT ALL THREE STACK POINTERS (KSP,SSP, AND USP CAN BE SELECTED. 
003116 012767 000000 174652 124: MOV #KM,PSW ;KERNEL MODE! 
#KPTR,KSP ;LOAD KERNEL STACK POINTER 
174640 #SM,PSW ; SUPERVISORY MODE!!! 
#SPTR,SSP ;LOAD SUPERVISOR STACK POINTER 
174626 #UM,PSW ;USER MODE! 
#UPTR USP ;LOAD USER STACK POINTER 
USP, TEMP :GET USER STACK POINTER 
174610 #BIT15,PSw SUPERVISORY MODE!!! 
SS, TEMP+2 :GET SUPERVISOR STACK POINTER 
PSW KERNEL MODE 
000500 —e CHECK KERNEL STACK POINTER 
+ 


003204 000000 ERROR! KERNEL STACK POINTER NOT LOADED 


003206 022767 000600 175570 #SPTR,TEMP+2 :CHECK SUPERVISOR STACK POINTER 
003214 001401 +4 
003216 000000 ERROR! SUPERVISOR STACK NOT LOADED 


003220 022767 000700 175554 #UPTR, TEMP CHECK USER STACK POINTER 
003226 001401 +4 
003230 000000 ERROR! USER STACK POINTER NOT LOADED 





ct ¢ 
CCKBHBO 11/45 REGISTERS MACY11 30A(1052) O1-MAY-78 13:27 PAGE 15 SEQ 0015 
CCKBHB.P11 21-APR-78 09:34 


003232 010701 SCOPE 


TEST THAT JSR aaa OPERATES PROPERLY WITH REG. SET BIT SET 
003234 012706 000500 125: MOV #KPTR,KSP INITIALIZE THE STACK POINTER 
#B1T0,R0 ;PRE SET RO 
174524 #B1T11,PSW ;SET REG. SET BIT 
#B1T8,R10 ;PRE SET R10 
000002 R10,125B :GO TO T25B & SAVE R10 ON THE STACK 


: :JSR DID NOT GO 
000476 : #KPTR=2,KSP 
+4 STACK POINTER DID NOT DECREMENT 


000400 175174 1 Saran? :WAS OLD CONTENTS OF R10 SAVED? 
.+ 


sERROR! R10 NOT SAVED ON THE STACK 
003262 pe 71S RETURN ADDRESS IN R10 
.+ 


;ERROR! RETURN ADRS. NOT SAVED IN R10 
174454 Psw 
000001 #81T0,RO ;RO LEFT UNCHANGED? 
.+ 


;RO GOT CHANGED 
003332 010701 


TEST JSR INSTRUCTION USING UPPER REG SET IN DEST. CALCULATION 
003334 012706 000500 T26: MOV #KPTR,KSP 

000040 #BITS,R5 sPRE SET RS 
004000 174424 #B1T11,PSw :SWITH TO UPPER REG. SET 

R15 sPRE SET R15 
003362 J R15, 126B(5) :GO TO 1268 

: sERROR! JSR FAILED 

175110 : KPTR=2 OLD CONTENTS OF R15 SAVED? 


+4 
sERROR! OLD CONTENTS OF R15 NOT SAVED 
003360 ee ;RETURN ADDRESS IN R15? 
.+ 


;ERROR! R15 DID NOT GET RETURN ADDRESS 
174370 PSW ;SWITCH TO LOWER REGISTERS 
000040 o- Ricssane 3;DID R5 CHANGE? 
.+ 


sERROR! RS GOT CHANGED 
003416 010701 


: TEST RTS WITH UPPER REGISTERS 
003420 012706 000500 127: MOV #KPTR,KSP 

#BIT9, (KSP) 

#BIT2,R2 sPRE SET R2 , 

174334 #81711, PSW :SWITCH TO UPPER REG. SET 
003452 #T27A,R12 ;LOAD REG. WITH RETURN ADDRESS 
R12 RETURN TO T27A_ (R12) 
‘ H ERROR! RTS FAILED 

000502 : 3 eee WAS STACK POINTER INCREMENTED 
+ 


ERROR! STACK POINTER WAS NOT INCREMENTED 
00° 000 #BIT9,R12 sWAS R12 RESTORED? 
003466 001401 +4 
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736 003470 000000 HLT sERROR! RTS DID NOT RESTORE R12 
737 003472 005067 174300 CLR PSW : SWITCH TO LOWER REG. SET 
738 003476 022702 000004 CMP #BIT2,R2 :DID R2 CHANGE? 

739 003502 001401 BEQ +4 

740 003504 000000 HLT sERROR! R2 CHANGED 

fas 003506 010701 SCOPE 

743 ;CHECK THAT ALL BITS IN KSP CAN BE SET/CLEARED. 

744 003510 012700 000001 MOV #1,R0 ;GET ‘1° BIT 

745 003514 012767 000000 174254 130: MOV #KM,PSW 

746 003522 010006 MOV RO,KSP ;LOAD KSP 

747 003524 010602 MOV KSP,R2 ;GET RESULT 

fe 003526 005067 174244 CLR PSwW KERNEL MODE!!! 

750 003532 020200 CMP R2,RO WAS KSP LOADED CORRECTLY? 
751 003534 001401 BEQ +4 

752 003536 000000 HLT 

753 003540 006300 ASL RO SHIFT ‘1' BIT THRU KSP 
754 003542 103364 BCC T30 UNTIL ALL BITS. ARE TESTED 
44 003544 010701 SCOPE 

757 CHECK THAT ALL BITS IN SSP CAN BE SET/CLEARED. 

758 003546 012700 000001 MOV #1,R0 ;GET ‘1° BIT 

759 003552 012767 040000 174216 131: MOV #SM,PSW 

760 003560 010006 MOV RO,SSP ;LOAD SSP 

761 003562 010602 MOV SSP,R2 ;GET RESULT 

oe 003564 005067 174206 CLR PSW KERNEL MODE!!! 

764 003570 020200 CMP R2,R0 WAS SSP LOADED CORRECTLY? 
765 003572 001401 BEQ +4 

766 003574 000000 HLT 

767 003576 006300 ASL RO SHIFT ‘1" BIT THRU SSP 
768 003600 103364 BCC 131 sUNTIL ALL BITS ARE TESTED 
44 003602 010701 SCOPE 

771 :CHECK THAT ALL BITS IN USP CAN BE SET/CLEARED. 

772 003604 012700 000001 MOV #1,RO0 ;GET '1' BIT 

773 ~003610 012767 140000 174160 132: MOV #UM,PSW 

774 003616 010006 MOV RO,USP ;LOAD USP 

775 003620 010602 MOV USP,R2 ;GET RESULT 

4a] 003622 005067 174150 CLR PSWwW KERNEL MODE!!! 

778 003626 020200 CMP R2,RO WAS USP LOADED CORRECTLY? 
779 003630 001401 BEQ +4 

780 003632 000000 HLT 

781 003634 006300 ASL RO :SHIFT "1° BIT THRU USP 
782 003636 103364 BCC T32 ;UNTIL ALL BITS ARE TESTED 
783 003640 010701 SCOPE 
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CHECK THAT ALL BITS IN THE MICRO BREAK REGISTER (177770) CAN BE SET 
:AND CLEARED 
012700 000001 133: MOV #1,RO0 
177770 #UBREAK ,R2 ;GET ADDRESS OF MICRO BREAK REGISTER 
T33A: RO, (R2) ;LOAD TEST BIT INTO REGISTER 
M (R2) ,R3 :GET RESULT 
as :COMPARE RESULT & TEST BIT 
+ 
003662 000000 aici BIT (RO) DID NOT SET INTO 
003664 040012 RO, (R2) CLEAR TEST BIT IN REGISTER 
ots ;GET RESULT 
+ 


ERROR! TEST BIT DID NOT GET CLEARED 
RO SHIFT TEST BIT UNTIL DONE 
T33A 
003700 010701 


;CHECK THAT RESET DOES NOT CLEAR MICRO BREAK REGISTER 
003702 012737 177777 177770 134: OV #-1,@#UBREAK ;SET ALL 1°S INTO REGISTER 
177777 =177770 oy - @#UBREAK ;CHECK RESULT 
.+ 


ERROR! 
;RESET DOES NOT CLEAR REGISTER 
177777 | =177770 > gorge ;CHECK THAT RESET DID NOT CLEAR ANY BITS 
.+ 


;ERROR! 
003736 010701 


003740 005267 175034 : ICNT ; INCREMENT PASS COUNT 
175030 001000 + pateasiema ;1000 PASSES? 


175034 BEGIN 
000007 173600 : #7, TPBUF RING THE BELL 
173572 TPCSR WAIT FOR THE BELL 
274 TO RING 
000042 a#42,R2 :GET DECTAPE MONITOR RETURN ADDRESS 
DONE1 3;D0 NOT RETURN IF (42)=0 
R ;CLEAR THE WORLD 
SENDAD: PC, (R2) ; RETURN TO DECTAPE MONITOR 
N A 


sACT1 
; OVERLAY 
7 AREA 
004014 000167 174770 DONE1: RESTART TEST 
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(LAR BRRABARARARARARASAAAAAAAASALASALASARSSALSAS ASSES ASSES SAAS ARLES SS 


MODIFIED FEB 28 1978 
CHECK FOR DUMP MODE OR AUTOMATIC/ACT11-XXDP MODE 


004020 005067 174054 CKMODE : AUTOM INIT AUTOMATIC MODE INDICATOR 
174052 C INIT ACT11 AUTO MODE INDICATOR 
174047 INIT XXDP AUTO MODE INDICATOR 
174044 INIT ACT11 DUMP MODE INDICATOR 
174041 : INIT XXDP DUMP MODE INDICATOR 
000042 AUTO MODE? 

BRANCH - IF NO 
174022 :SET AUTO MODE INDICATOR 
000042 000046 ;ACT11 MODE? 
1$ BRANCH - IF YES 
174011 zs INDICATE XXDP AUTO MODE 
B 5 zAND EXIT 
174002 : INDICATE ACT11 MODE 
B 5$ zAND EXIT 
000041 : s;MAN/MODE VIA ACT11/PAPER TAPE? 
;BRANCH = IF NO 
173770 s INDICATE MAN/MODE VIA ACT11/PAPER TAPE 
5$ zAND EXIT 
173763 : : INDICATE MANUAL MODE VIA XXDP 
000042 : ;AUTO MODE? 
6 :;BRANCH ~- IF YES 
173746 ;RE-INIT ACT FLAG 
004134 000207 : ; RETURN 


(RAR RARASRASASAASLASLASLASARSASLALASASALALASESSERSSESSS ESSA S ESE SEALE SE SS | 


000001 
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CCKBHB.P11 21-APR-78 09:34 CROSS REFERENCE TABLE -- USER SYMBOLS 
ACT11M 000102 2814 841% 852* 861* 

ADUMPM 000104 2834 843+ 856% 
AUTOM 000100 2804 840* 847* 
AQ 001336 3748 
AOA 001362 3784 384 
Al 001410 3884 
AIA 001434 3928 398 
A2 001462 4024 
A2A 001506 4064 412 
A3 001534 4164 

A3A 001560 4204 426 
AG 001606 430# 
AGA 001632 4344 440 
AS 001660 4448 

SA 001704 4484 454 

BEGIN 001014 2994 818 

BITO = 000001. 1634 307 324 471 684 699 

BIT1 = 000002 1644 308 327 

1T10 = 002000 1754 316 353 461 588 607 610 
BIT11 = 004000 176# 313 317 346 356 374 388 402 416 430 444 458 462 


468 479 486 495 503 512 517 526 527 538 539 548 555 
565 574 585 588 591 595 607 616 630 685 707 727 


BIT12 = 010000 1774 318 359 463 601 
BIT13 = 020000 1784 319 362 464 
1T14 = 040000 1798 
BIT15 = 100000 1804 666 
BIT2 = 000004 1654 309 330 490 499 517 726 738 
BITS = 000010 1664 310 333 507 
1T4 = 000020 167# 311 336 515 527 
BITS = 000040 1684 312 339 543 706 718 
BIT6 = 000100 1694 
BIT? = 000200 170# 557 
BIT8 = 000400 1734 314 347 459 562 686 692 
BIT9 = 001000 1744 315 350 460 581 725 734 
CKMODE 004020 291 8404 
DISPLA= 177570 2094 299% 
DONE1 004014 823 8294 
DRIVE 000040 2478 
MTVEC= 000030 2214 
ND 003740 8154 
RRVEC= 000004 2194 
LT = 000000 2178 326 329 332 335 338 341 344 349 352 355 358 361 
364 367 368 382 396 410 424 438 452 473 476 483 492 
501 509 519 521 531 533 545 552 561 570 580 590 598 
609 621 624 635 638 652 655 671 675 679 688 691 694 
697 701 710 713 716 720 730 733 736 740 52 766 780 
794 799 808 812 
ICNT 001000 2958 298+ 299 815+ 816 
mM = 000000 2244 659 745 
PTR = 000500 2054 300 342 660 669 683 689 692 705 711 724 731 
MEDIUM 000041 2514 
POP2 == 022626 2154 522 534 
PSW = 177776 2104 304* 313% 321* 346% 370* 374% 388* 402* 416* 430* 444% 458+ 
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698+ 762* 
= 010701 413 502 


553 639 
741 


91002 


177566 


002166 
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16 002226 
T6A 002276 
T6X 002302 
17 002304 
T7A 002344 
T7x 002350 
BREAK= © "777 

la = 140000 
PTR = 000700 


XXDPM 000103 
ENDAD 004004 

vP 000400 
004136 


- ABS. 004136 


ERRORS DETECTED: 


512# 
513 5214 
518 520 5234 
5254 
525 5334 
32 


000 


0 


CCKBHB ,OSKW: CCKBHB.SEQ/SOL/NL : TOC=CCKBHB.P11 
SECONDS 


RUN-TIME: .9 1 


RUN-TIME RATIO: 79/3=25.1 


CORE USED: 6K 


DOCUMENT PAGES: 


(11 PAGES) 
21 


MACY11 30A(1052) 


01-MAY-78 


805+ 


806 


1 2 
13:27 PAGE 22 
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810 


SEQ 0021 


